home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Windows 95 API Bible
/
Windows 95 API Bible 3 Disc Set.iso
/
Win32 API Bible Book 2 of 3.iso
/
chapter4
/
delitem.c
< prev
next >
Wrap
C/C++ Source or Header
|
1996-03-06
|
14KB
|
410 lines
#include <windows.h>
#include "delitem.h"
#include "commctrl.h"
#if defined (WIN32)
#define IS_WIN32 TRUE
#else
#define IS_WIN32 FALSE
#endif
#define IS_NT IS_WIN32 && (BOOL)(GetVersion() < 0x80000000)
#define IS_WIN32S IS_WIN32 && (BOOL)(!(IS_NT) && (LOBYTE(LOWORD(GetVersion()))<4))
#define IS_WIN95 (BOOL)(!(IS_NT) && !(IS_WIN32S)) && IS_WIN32
HINSTANCE hInst; // current instance
LPCTSTR lpszAppName = "MyApp";
LPCTSTR lpszTitle = "TabCtrl_DeleteItem";
BOOL RegisterWin95( CONST WNDCLASS* lpwc );
int APIENTRY WinMain( HINSTANCE hInstance, HINSTANCE hPrevInstance,
LPTSTR lpCmdLine, int nCmdShow)
{
MSG msg;
HWND hWnd;
WNDCLASS wc;
wc.style = CS_HREDRAW | CS_VREDRAW;
wc.lpfnWndProc = (WNDPROC)WndProc;
wc.cbClsExtra = 0;
wc.cbWndExtra = 0;
wc.hInstance = hInstance;
wc.hIcon = LoadIcon (hInstance, lpszAppName);
wc.hCursor = LoadCursor(NULL, IDC_ARROW);
wc.hbrBackground = (HBRUSH)(COLOR_3DFACE+1);
wc.lpszMenuName = lpszAppName;
wc.lpszClassName = lpszAppName;
if ( IS_WIN95 )
{
if ( !RegisterWin95( &wc ) )
return( FALSE );
}
else if ( !RegisterClass( &wc ) )
return( FALSE );
hInst = hInstance;
hWnd = CreateWindow( lpszAppName,
lpszTitle,
WS_OVERLAPPEDWINDOW,
CW_USEDEFAULT, 0,
CW_USEDEFAULT, 0,
NULL,
NULL,
hInstance,
NULL
);
if ( !hWnd )
return( FALSE );
ShowWindow( hWnd, nCmdShow );
UpdateWindow( hWnd );
while( GetMessage( &msg, NULL, 0, 0) )
{
TranslateMessage( &msg );
DispatchMessage( &msg );
}
return( msg.wParam );
}
BOOL RegisterWin95( CONST WNDCLASS* lpwc )
{
WNDCLASSEX wcex;
wcex.style = lpwc->style;
wcex.lpfnWndProc = lpwc->lpfnWndProc;
wcex.cbClsExtra = lpwc->cbClsExtra;
wcex.cbWndExtra = lpwc->cbWndExtra;
wcex.hInstance = lpwc->hInstance;
wcex.hIcon = lpwc->hIcon;
wcex.hCursor = lpwc->hCursor;
wcex.hbrBackground = lpwc->hbrBackground;
wcex.lpszMenuName = lpwc->lpszMenuName;
wcex.lpszClassName = lpwc->lpszClassName;
// Added elements for Windows 95.
//...............................
wcex.cbSize = sizeof(WNDCLASSEX);
wcex.hIconSm = LoadImage(wcex.hInstance, lpwc->lpszClassName,
IMAGE_ICON, 16, 16,
LR_DEFAULTCOLOR );
return RegisterClassEx( &wcex );
}
LPCTSTR szImages[] = { "CIRCLE", "RECTANGLE", "LINES" };
LPCTSTR szMasks[] = { "CIRCLEM", "RECTANGLEM", "LINESM" };
LPCTSTR szTips[] = { "Display a circle", "Display a rectangle", "Display lines" };
HWND hTab = NULL;
FARPROC pDefStatProc = NULL;
LRESULT CALLBACK StatProc( HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam )
{
static TC_ITEM item;
static int nSel = 0;
switch( uMsg )
{
case WM_PAINT :
{
PAINTSTRUCT ps;
BeginPaint( hWnd, &ps );
// Determine which tab is displayed.
//..................................
nSel = TabCtrl_GetCurSel( hTab );
if ( nSel > -1 )
{
item.mask = TCIF_PARAM;
TabCtrl_GetItem( hTab, nSel, &item );
// Paint the appropriate figure for the tab.
//..........................................
switch( item.lParam )
{
case 1 : Ellipse( ps.hdc, 10, 10, 100, 100 );
break;
case 2 : Rectangle( ps.hdc, 10, 10, 100, 100 );
break;
case 3 : MoveToEx( ps.hdc, 10, 10, NULL );
LineTo( ps.hdc, 100, 100 );
MoveToEx( ps.hdc, 100, 10, NULL );
LineTo( ps.hdc, 10, 100 );
break;
}
}
EndPaint( hWnd, &ps );
}
break;
default :
return( (*pDefStatProc)(hWnd, uMsg, wParam, lParam) );
}
return( FALSE );
}
VOID UpdateTabWindow( HWND hWnd, RECT* pRect )
{
if ( TabCtrl_GetItemCount( hTab ) == 1 )
{
SendMessage( hWnd, WM_SIZE, 0, MAKELPARAM( pRect->right, pRect->bottom ) );
InvalidateRect( hWnd, NULL, TRUE );
}
}
int AddImage( HIMAGELIST hList, int nIdx )
{
HBITMAP hBmp, hMask;
// Load the images for the image.
//...............................
hBmp = LoadBitmap( hInst, szImages[nIdx] );
hMask = LoadBitmap( hInst, szMasks[nIdx] );
// Add the image to the list.
//...........................
nIdx = ImageList_Add( hList, hBmp, hMask );
DeleteObject( hBmp );
DeleteObject( hMask );
// Return the image index.
//........................
return( nIdx );
}
LRESULT CALLBACK WndProc( HWND hWnd, UINT uMsg, WPARAM wParam, LPARAM lParam )
{
static RECT rcDisp, clRect;
static TC_ITEM item;
static HWND hStatic = NULL;
switch( uMsg )
{
case WM_CREATE :
// Initialize and create the tab control and the static control.
//..............................................................
InitCommonControls();
hTab = CreateWindowEx( 0, WC_TABCONTROL, "",
WS_CHILD | WS_CLIPSIBLINGS |
WS_VISIBLE | TCS_FIXEDWIDTH |
TCS_FORCELABELLEFT | TCS_TOOLTIPS,
0, 0, 10, 10, hWnd,
(HMENU)101, hInst, NULL );
hStatic = CreateWindowEx( 0, "STATIC", "", WS_CHILD | WS_VISIBLE,
0, 0, 10, 10, hWnd, (HMENU)102,
hInst, NULL );
if ( hTab )
{
HIMAGELIST hList;
SendMessage( hTab, WM_SETFONT,
(WPARAM)GetStockObject( DEFAULT_GUI_FONT ), 0 );
// Create an image list and associate it.
//.......................................
hList = ImageList_Create( 16, 15, ILC_COLOR4 | ILC_MASK, 3, 1 );
TabCtrl_SetImageList( hTab, hList );
// Set the size and spacing for the Tabs.
//.......................................
TabCtrl_SetItemSize( hTab, 100, 25 );
TabCtrl_SetPadding( hTab, 10, 4 );
// Change tool tip delay.
//.......................
SendMessage( TabCtrl_GetToolTips( hTab ),
TTM_SETDELAYTIME, TTDT_RESHOW, 1000 );
}
// Subclass the static control to perform painting.
//.................................................
if ( hStatic )
pDefStatProc = (FARPROC)SetWindowLong( hStatic, GWL_WNDPROC, (LONG)StatProc );
break;
case WM_SIZE :
// Retrieve the client rect.
//..........................
GetClientRect( hWnd, &clRect );
GetClientRect( hWnd, &rcDisp );
// Calculate the tab control display area.
//........................................
TabCtrl_AdjustRect( hTab, FALSE, &rcDisp );
// Size the tab control.
//......................
MoveWindow( hTab, 0, 0, LOWORD(lParam), HIWORD(lParam), TRUE );
MoveWindow( hStatic, rcDisp.left, rcDisp.top,
rcDisp.right-rcDisp.left,
rcDisp.bottom-rcDisp.top, TRUE );
break;
case WM_NOTIFY :
switch( ((NMHDR*)lParam)->code )
{
case TCN_SELCHANGE :
// The user selected a different tab.
// Force the window to be painted.
//...................................
InvalidateRect( hTab, &rcDisp, TRUE );
UpdateWindow( hTab );
InvalidateRect( hStatic, NULL, TRUE );
break;
case TTN_NEEDTEXT :
// Retrieve item information and set tip text.
//............................................
item.mask = TCIF_PARAM;
TabCtrl_GetItem( hTab, ((NMHDR*)lParam)->idFrom, &item );
((LPTOOLTIPTEXT)lParam)->lpszText = (LPTSTR)szTips[item.lParam-1];
break;
}
break;
case WM_COMMAND :
switch( LOWORD( wParam ) )
{
case IDM_CIRCLE :
item.mask = TCIF_TEXT | TCIF_PARAM | TCIF_IMAGE;
item.pszText = "Circle";
item.lParam = 1;
item.iImage = AddImage( TabCtrl_GetImageList( hTab ), 0 );
TabCtrl_InsertItem( hTab, TabCtrl_GetItemCount( hTab ), &item );
UpdateTabWindow( hWnd, &clRect );
break;
case IDM_RECTANGLE :
item.mask = TCIF_TEXT | TCIF_PARAM | TCIF_IMAGE;
item.pszText = "Rectangle";
item.lParam = 2;
item.iImage = AddImage( TabCtrl_GetImageList( hTab ), 1 );
TabCtrl_InsertItem( hTab, TabCtrl_GetItemCount( hTab ), &item );
UpdateTabWindow( hWnd, &clRect );
break;
case IDM_LINES :
item.mask = TCIF_TEXT | TCIF_PARAM | TCIF_IMAGE;
item.pszText = "Lines";
item.lParam = 3;
item.iImage = AddImage( TabCtrl_GetImageList( hTab ), 2 );
TabCtrl_InsertItem( hTab, TabCtrl_GetItemCount( hTab ), &item );
UpdateTabWindow( hWnd, &clRect );
break;
case IDM_DELETE :
{
int nSel = TabCtrl_GetCurFocus( hTab );
if ( nSel > -1 )
{
// Delete the tab and related image.
//..................................
TabCtrl_DeleteItem( hTab, nSel );
TabCtrl_RemoveImage( hTab, nSel );
// Set the selected tab to the next tab or
// the previous one if the deleted tab was the
// last tab in the tab control.
//............................................
if ( nSel > TabCtrl_GetItemCount( hTab )-1 )
nSel--;
if ( nSel > -1 )
{
TabCtrl_SetCurSel( hTab, nSel );
InvalidateRect( hTab, &rcDisp, TRUE );
UpdateWindow( hTab );
InvalidateRect( hStatic, NULL, TRUE );
}
else
InvalidateRect( hTab, NULL, TRUE );
}
}
break;
case IDM_DELETEALL :
{
HIMAGELIST hList;
TabCtrl_DeleteAllItems( hTab );
// Remove all images from the image list.
//.......................................
hList = TabCtrl_GetImageList( hTab );
ImageList_Remove( hList, -1 );
}
break;
case IDM_ABOUT :
DialogBox( hInst, "AboutBox", hWnd, (DLGPROC)About );
break;
case IDM_EXIT :
DestroyWindow( hWnd );
break;
}
break;
case WM_DESTROY :
ImageList_Destroy( TabCtrl_GetImageList( hTab ) );
PostQuitMessage(0);
break;
default :
return( DefWindowProc( hWnd, uMsg, wParam, lParam ) );
}
return( FALSE );
}
LRESULT CALLBACK About( HWND hDlg,
UINT message,
WPARAM wParam,
LPARAM lParam)
{
switch (message)
{
case WM_INITDIALOG:
return (TRUE);
case WM_COMMAND:
if ( LOWORD(wParam) == IDOK
|| LOWORD(wParam) == IDCANCEL)
{
EndDialog(hDlg, TRUE);
return (TRUE);
}
break;
}
return (FALSE);
}